home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-10-22 | 611 b | 19 lines | [TEXT/MSWD] |
- length-repeat-l repeats length-list
-
-
- simply divides lengths by repeat-value which can be a single
- integer to affect the whole length-list or a list of
- integers which are repeated during length-list.
-
- (length-repeat-l 2 '(1/2 1/4 1/2 1/8 1/8))
- ->(1/4 1/4 1/8 1/8 1/4 1/4 1/16 1/16 1/16 1/16)
-
- (length-repeat-l '(2 3) '(1/2 1/4 1/2 1/8 1/8))
- ->(1/4 1/4 1/12 1/12 1/12 1/4 1/4 1/24 1/24 1/24 1/16 1/16)
-
-
- simply use 1 for the lengths you don't want to change.
-
- (length-repeat-l '(8 1 8 1 1) '(1/2 1/4 1/2 1/8 1/8))
- ->(1/16 1/16 1/16 1/16 1/16 1/16 1/16 1/16 1/4 1/16 1/16 1/16 1/16 1/16 1/16 1/16 1/16 1/8 1/8)
-